home *** CD-ROM | disk | FTP | other *** search
/ Stone Design / Stone Design.iso / Stone_Friends / Wave / WavesWorld / Source / Shaders / RCShaders / RCFog.sl < prev    next >
Encoding:
Text File  |  1995-03-22  |  224 b   |  14 lines
  1. /* Listing 16.10  Fog volume shader*/
  2. /*
  3.  *  fog(): introduce depth-based fog
  4.  */
  5. volume
  6. RCFog ( 
  7.     float    distance    = 1; 
  8.     color    background    = 0 )
  9. {
  10.     float d = 1 - exp( -length(I)/distance );
  11.     Ci = mix( Ci, background, d );
  12. }
  13.  
  14.